# Metview Macro - created from Display Window contents
# By:   prod
# Date: Tue Mar 13 11:08:25 2012
# For:  cgi (Iain Russell)
# 
# Disclaimer:
#   This macro is to be used primarily as a framework. 
#   Some macros generated in this manner may not work  
#   as expected and in such cases you may need to 
#   fine-tune the macro manually! 
  
# Device Description 
File = ps_output(  
		OUTPUT_NAME : "/home/graphics/cgi/metview//macro_tutorial/Plot Page Button/ps" 
	) 
  
# Checks running mode  
mode = runmode()  
if mode = 'batch' or mode = 'execute' then  
          setoutput(File)  
end if  
  
# Call function to build layout (defined at end of macro)
display_window = build_layout()

# Drops to SuperPage.
  
# Data and Visualisation parameters 
  

# Drops to Page.
  
# Data and Visualisation parameters 
  
T = retrieve(  
		LEVTYPE : "SFC", 
		PARAM   : "2T", 
		GRID    : [ 1.5,1.5 ] 
	) 
t_shade = mcont(  
		LEGEND                       : "ON", 
		CONTOUR_LEVEL_SELECTION_TYPE : "LEVEL_LIST", 
		CONTOUR_LEVEL_LIST           : [ -60,-30,-20,-15,-10,-5,0,5,10,15,20,30,60 ], 
		CONTOUR_LABEL_FREQUENCY      : 1, 
		CONTOUR_SHADE                : "ON", 
		CONTOUR_SHADE_METHOD         : "AREA_FILL", 
		CONTOUR_SHADE_COLOUR_METHOD  : "LIST", 
		CONTOUR_SHADE_COLOUR_LIST    : [ "RGB(0.164,0.043,0.85)","RGB(0.15,0.306,1.0)","RGB(0.25,0.63,1.0)","RGB(0.45,0.853,1.0)","RGB(0.67,0.973,1.0)","RGB(0.88,1.0,1.0)","RGB(1.0,1.0,0.75)","RGB(1.0,0.88,0.6)","RGB(1.0,0.679,0.45)","RGB(0.97,0.43,0.37)","RGB(0.85,0.15,0.196)","RGB(0.65,0.0,0.13)" ] 
	) 
  
# Plot command  
plot ( display_window[1], T, t_shade ) 
  
# Data and Visualisation parameters 
  
T = retrieve(  
		LEVTYPE : "SFC", 
		PARAM   : "2T", 
		GRID    : [ 1.5,1.5 ] 
	) 
t2m_shade = mcont(  
		LEGEND                         : "ON", 
		CONTOUR                        : "OFF", 
		CONTOUR_LEVEL_SELECTION_TYPE   : "INTERVAL", 
		CONTOUR_INTERVAL               : 1.0, 
		CONTOUR_SHADE                  : "ON", 
		CONTOUR_SHADE_METHOD           : "AREA_FILL", 
		CONTOUR_SHADE_MAX_LEVEL_COLOUR : "ROSE", 
		CONTOUR_SHADE_MIN_LEVEL_COLOUR : "BLUE", 
		CONTOUR_SHADE_COLOUR_DIRECTION : "CLOCKWISE" 
	) 
  
# Plot command  
plot ( display_window[2], T, t2m_shade ) 
  
# Data and Visualisation parameters 
  
T = retrieve(  
		LEVTYPE : "SFC", 
		PARAM   : "2T", 
		GRID    : [ 1.5,1.5 ] 
	) 
grid_2x2 = mcont(  
		CONTOUR_LINE_COLOUR              : "RGB(0.74,0.86,1)", 
		CONTOUR_HIGHLIGHT_COLOUR         : "RGB(0.74,0.86,1)", 
		CONTOUR_GRID_VALUE_PLOT          : "ON", 
		CONTOUR_GRID_VALUE_PLOT_TYPE     : "BOTH", 
		CONTOUR_GRID_VALUE_LAT_FREQUENCY : 2, 
		CONTOUR_GRID_VALUE_LON_FREQUENCY : 2, 
		CONTOUR_GRID_VALUE_FORMAT        : "F4.1" 
	) 
  
# Plot command  
plot ( display_window[3], T, grid_2x2 ) 

# End of main program

# Function to build the layout.
function build_layout()

    #PageDescription  
    COASTLINES1 = mcoast(  
    		MAP_COASTLINE                  : "ON", 
    		MAP_COASTLINE_COLOUR           : "BLACK", 
    		MAP_COASTLINE_RESOLUTION       : "AUTOMATIC", 
    		MAP_COASTLINE_STYLE            : "SOLID", 
    		MAP_COASTLINE_THICKNESS        : 1, 
    		MAP_COASTLINE_LAND_SHADE       : "OFF", 
    		MAP_COASTLINE_SEA_SHADE        : "OFF", 
    		MAP_COASTLINE_SEA_SHADE_COLOUR : "BLUE", 
    		MAP_BOUNDARIES                 : "OFF", 
    		MAP_CITIES                     : "OFF", 
    		MAP_RIVERS                     : "OFF", 
    		MAP_GRID                       : "ON", 
    		MAP_GRID_LATITUDE_REFERENCE    : 0, 
    		MAP_GRID_LATITUDE_INCREMENT    : 10, 
    		MAP_GRID_LONGITUDE_REFERENCE   : 0, 
    		MAP_GRID_LONGITUDE_INCREMENT   : 20, 
    		MAP_GRID_LINE_STYLE            : "SOLID", 
    		MAP_GRID_THICKNESS             : 1, 
    		MAP_GRID_COLOUR                : "BLACK", 
    		MAP_LABEL                      : "ON", 
    		MAP_LABEL_LEFT                 : "ON", 
    		MAP_LABEL_RIGHT                : "ON", 
    		MAP_LABEL_BOTTOM               : "ON", 
    		MAP_LABEL_TOP                  : "ON", 
    		MAP_LABEL_QUALITY              : "MEDIUM", 
    		MAP_LABEL_COLOUR               : "BLACK", 
    		MAP_LABEL_HEIGHT               : 0.25, 
    		MAP_LABEL_LATITUDE_FREQUENCY   : 1, 
    		MAP_LABEL_LONGITUDE_FREQUENCY  : 1 
    	) 
    world = geoview(  
    		COASTLINES    : COASTLINES1 
    	) 
    Page = plot_page(  
    		TOP        : 0, 
    		BOTTOM     : 50, 
    		LEFT       : 0, 
    		RIGHT      : 100, 
    		ROWS       : 1, 
    		COLUMNS    : 1, 
    		PAGE_X_GAP : 0, 
    		PAGE_Y_GAP : 0, 
    		VIEW                     : world 
    	)  
    #PageDescription  
    COASTLINES1 = mcoast(  
    		MAP_COASTLINE                  : "ON", 
    		MAP_COASTLINE_COLOUR           : "BLACK", 
    		MAP_COASTLINE_RESOLUTION       : "AUTOMATIC", 
    		MAP_COASTLINE_STYLE            : "SOLID", 
    		MAP_COASTLINE_THICKNESS        : 1, 
    		MAP_COASTLINE_LAND_SHADE       : "OFF", 
    		MAP_COASTLINE_SEA_SHADE        : "OFF", 
    		MAP_COASTLINE_SEA_SHADE_COLOUR : "BLUE", 
    		MAP_BOUNDARIES                 : "OFF", 
    		MAP_CITIES                     : "OFF", 
    		MAP_RIVERS                     : "OFF", 
    		MAP_GRID                       : "ON", 
    		MAP_GRID_LATITUDE_REFERENCE    : 0, 
    		MAP_GRID_LATITUDE_INCREMENT    : 10, 
    		MAP_GRID_LONGITUDE_REFERENCE   : 0, 
    		MAP_GRID_LONGITUDE_INCREMENT   : 20, 
    		MAP_GRID_LINE_STYLE            : "SOLID", 
    		MAP_GRID_THICKNESS             : 1, 
    		MAP_GRID_COLOUR                : "BLACK", 
    		MAP_LABEL                      : "ON", 
    		MAP_LABEL_LEFT                 : "ON", 
    		MAP_LABEL_RIGHT                : "ON", 
    		MAP_LABEL_BOTTOM               : "ON", 
    		MAP_LABEL_TOP                  : "ON", 
    		MAP_LABEL_QUALITY              : "MEDIUM", 
    		MAP_LABEL_COLOUR               : "BLACK", 
    		MAP_LABEL_HEIGHT               : 0.25, 
    		MAP_LABEL_LATITUDE_FREQUENCY   : 1, 
    		MAP_LABEL_LONGITUDE_FREQUENCY  : 1 
    	) 
    europe = geoview(  
    		MAP_AREA_DEFINITION    : "CORNERS", 
    		AREA                   : [ 33.12,-19.02,72.16,46.34 ], 
    		MAP_VERTICAL_LONGITUDE : 0, 
    		COASTLINES             : COASTLINES1 
    	) 
    Page_1 = plot_page(  
    		TOP        : 50, 
    		BOTTOM     : 100, 
    		LEFT       : 0, 
    		RIGHT      : 50, 
    		ROWS       : 1, 
    		COLUMNS    : 1, 
    		PAGE_X_GAP : 0, 
    		PAGE_Y_GAP : 0, 
    		VIEW                     : europe 
    	)  
    #PageDescription  
    COASTLINES1 = mcoast(  
    		MAP_COASTLINE                  : "ON", 
    		MAP_COASTLINE_COLOUR           : "BLACK", 
    		MAP_COASTLINE_RESOLUTION       : "AUTOMATIC", 
    		MAP_COASTLINE_STYLE            : "SOLID", 
    		MAP_COASTLINE_THICKNESS        : 1, 
    		MAP_COASTLINE_LAND_SHADE       : "OFF", 
    		MAP_COASTLINE_SEA_SHADE        : "OFF", 
    		MAP_COASTLINE_SEA_SHADE_COLOUR : "BLUE", 
    		MAP_BOUNDARIES                 : "OFF", 
    		MAP_CITIES                     : "OFF", 
    		MAP_RIVERS                     : "OFF", 
    		MAP_GRID                       : "ON", 
    		MAP_GRID_LATITUDE_REFERENCE    : 0, 
    		MAP_GRID_LATITUDE_INCREMENT    : 10, 
    		MAP_GRID_LONGITUDE_REFERENCE   : 0, 
    		MAP_GRID_LONGITUDE_INCREMENT   : 20, 
    		MAP_GRID_LINE_STYLE            : "SOLID", 
    		MAP_GRID_THICKNESS             : 1, 
    		MAP_GRID_COLOUR                : "BLACK", 
    		MAP_LABEL                      : "ON", 
    		MAP_LABEL_LEFT                 : "ON", 
    		MAP_LABEL_RIGHT                : "ON", 
    		MAP_LABEL_BOTTOM               : "ON", 
    		MAP_LABEL_TOP                  : "ON", 
    		MAP_LABEL_QUALITY              : "MEDIUM", 
    		MAP_LABEL_COLOUR               : "BLACK", 
    		MAP_LABEL_HEIGHT               : 0.25, 
    		MAP_LABEL_LATITUDE_FREQUENCY   : 1, 
    		MAP_LABEL_LONGITUDE_FREQUENCY  : 1 
    	) 
    uk = geoview(  
    		MAP_AREA_DEFINITION    : "CORNERS", 
    		AREA                   : [ 45.94,-12.04,63.01,3.46 ], 
    		MAP_VERTICAL_LONGITUDE : 0, 
    		COASTLINES             : COASTLINES1 
    	) 
    Page_2 = plot_page(  
    		TOP        : 50, 
    		BOTTOM     : 100, 
    		LEFT       : 50, 
    		RIGHT      : 100, 
    		ROWS       : 1, 
    		COLUMNS    : 1, 
    		PAGE_X_GAP : 0, 
    		PAGE_Y_GAP : 0, 
    		VIEW                     : uk 
    	)  
      
    # SuperPageDescription 
    Display_Window = plot_superpage(  
    		LAYOUT_SIZE        : "A4", 
    		LAYOUT_ORIENTATION : "LANDSCAPE", 
    		CUSTOM_WIDTH       : 29.7, 
    		CUSTOM_HEIGHT      : 21.0, 
    		PAGES                    : [ Page, Page_1, Page_2 ] 
    	) 
    # plot_superpage returns a list of drop identifiers. 
    # Index 1 is for first page, and so on. 
    # end of superpage definition  
      
    return Display_Window 

end build_layout
